mindata=Import["C:\\Users\\vanillagrief35\\Documents\\Tabligbo Min Data.csv"];
maxdata=Import["C:\\Users\\vanillagrief35\\Documents\\Tabligbo Max Data.csv"];

minyear=Rest[mindata[[All,1]]];
maxyear=Rest[maxdata[[All,1]]];
mintemp=Rest[mindata[[All,2]]];
maxtemp=Rest[maxdata[[All,2]]];

minyears=minyear-1961;
maxyears=maxyear-1961;

mintable=Table[{minyears[[i]],mintemp[[i]]},{i,1,660}];
maxtable=Table[{maxyears[[i]],maxtemp[[i]]},{i,1,660}];

minm=LinearModelFit[mintable,{x,Cos[2π*x],Sin[2π*x]},x,ConfidenceLevel->0.95]

minmplot=Plot[minm[x],{x,0,55},PlotRange->All];
minplot=ListPlot[mintable];
Show[{minmplot,minplot},PlotLabel->"Tablibgo Monthly Minimum Temperature",AxesLabel->{"Month","Temperature"}]

ListPlot[minm["FitResiduals"],Filling->Axis,PlotLabel->"Tablibgo Monthly Minimum Temperature Residuals",AxesLabel->{"Month","Difference in Temperature"}]
minm["ParameterConfidenceIntervals"]
minm["ParameterTable"]

minm["RSquared"]

Histogram[minm["FitResiduals"]]

maxm=LinearModelFit[maxtable,{x,Cos[2π*x],Sin[2π*x]},x,ConfidenceLevel->0.95]

maxmplot=Plot[maxm[x],{x,0,55},PlotRange->All];
maxplot=ListPlot[maxtable];
Show[{maxmplot,maxplot},PlotLabel->"Tablibgo Monthly Maximum Temperature",AxesLabel->{"Month","Temperature"}]

ListPlot[maxm["FitResiduals"],Filling->Axis,PlotLabel->"Tablibgo Monthly Maximum Temperature Residuals",AxesLabel->{"Month","Difference in Temperature"}]
maxm["ParameterConfidenceIntervals"]
maxm["ParameterTable"]

maxm["RSquared"]

Histogram[maxm["FitResiduals"]]